home *** CD-ROM | disk | FTP | other *** search
/ Delphi 2.0 - Programmer's Utilities Power Pack / Delphi 2.0 Programmer's Utilities Power Pack.iso / m_to_r / rtdc / testuni1.dfm / testuni1.txt
Encoding:
Text File  |  1996-09-15  |  2.9 KB  |  154 lines
  1. object Form1: TForm1
  2.   Left = 146
  3.   Top = 171
  4.   AutoScroll = False
  5.   Caption = 'RtDbCopy'
  6.   ClientHeight = 265
  7.   ClientWidth = 598
  8.   Font.Color = clBlack
  9.   Font.Height = -13
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   PixelsPerInch = 96
  13.   Position = poScreenCenter
  14.   Scaled = False
  15.   OnCreate = FormCreate
  16.   TextHeight = 16
  17.   object Gauge1: TGauge
  18.     Left = 0
  19.     Top = 245
  20.     Width = 598
  21.     Height = 20
  22.     Align = alBottom
  23.     Progress = 0
  24.   end
  25.   object DBGrid1: TDBGrid
  26.     Left = 0
  27.     Top = 41
  28.     Width = 598
  29.     Height = 204
  30.     Align = alClient
  31.     DataSource = DataSource1
  32.     TabOrder = 1
  33.     TitleFont.Color = clBlack
  34.     TitleFont.Height = -13
  35.     TitleFont.Name = 'MS Sans Serif'
  36.     TitleFont.Style = []
  37.     Visible = False
  38.   end
  39.   object Panel1: TPanel
  40.     Left = 0
  41.     Top = 0
  42.     Width = 598
  43.     Height = 41
  44.     Align = alTop
  45.     TabOrder = 0
  46.     object Label1: TLabel
  47.       Left = 8
  48.       Top = 8
  49.       Width = 43
  50.       Height = 16
  51.       Caption = 'Source'
  52.     end
  53.     object Label2: TLabel
  54.       Left = 200
  55.       Top = 8
  56.       Width = 67
  57.       Height = 16
  58.       Caption = 'Destination'
  59.     end
  60.     object ComboBox1: TComboBox
  61.       Left = 56
  62.       Top = 8
  63.       Width = 129
  64.       Height = 24
  65.       ItemHeight = 16
  66.       TabOrder = 0
  67.       OnExit = ComboBox1Exit
  68.     end
  69.     object Edit1: TEdit
  70.       Left = 272
  71.       Top = 8
  72.       Width = 97
  73.       Height = 24
  74.       TabOrder = 1
  75.     end
  76.     object BitBtn1: TBitBtn
  77.       Left = 384
  78.       Top = 8
  79.       Width = 89
  80.       Height = 25
  81.       Caption = 'Start'
  82.       TabOrder = 2
  83.       OnClick = BitBtn1Click
  84.       Kind = bkOK
  85.       Style = bsNew
  86.     end
  87.     object BitBtn2: TBitBtn
  88.       Left = 488
  89.       Top = 8
  90.       Width = 89
  91.       Height = 25
  92.       Font.Color = clBlack
  93.       Font.Height = -13
  94.       Font.Name = 'MS Sans Serif'
  95.       Font.Style = [fsBold]
  96.       ParentFont = False
  97.       TabOrder = 3
  98.       OnClick = BitBtn2Click
  99.       Kind = bkClose
  100.       Style = bsNew
  101.     end
  102.   end
  103.   object StringGrid1: TStringGrid
  104.     Left = 0
  105.     Top = 41
  106.     Width = 598
  107.     Height = 204
  108.     Align = alClient
  109.     ColCount = 4
  110.     DefaultColWidth = 150
  111.     FixedCols = 2
  112.     Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goEditing, goTabs]
  113.     TabOrder = 2
  114.     RowHeights = (
  115.       24
  116.       24
  117.       24
  118.       24
  119.       24)
  120.   end
  121.   object Database1: TDatabase
  122.     DatabaseName = 'TEST'
  123.     LoginPrompt = False
  124.     Left = 8
  125.     Top = 200
  126.   end
  127.   object Table1: TTable
  128.     DatabaseName = 'TEST'
  129.     Left = 40
  130.     Top = 200
  131.   end
  132.   object Table2: TTable
  133.     DatabaseName = 'TEST'
  134.     Left = 72
  135.     Top = 200
  136.   end
  137.   object DataSource1: TDataSource
  138.     DataSet = Table2
  139.     Left = 136
  140.     Top = 200
  141.   end
  142.   object RtDbCopy1: TRtDbCopy
  143.     Destination = Table2
  144.     Mode = batCopy
  145.     Source = Table1
  146.     Transaction = False
  147.     OnError = RtDbCopy1Error
  148.     OnField = RtDbCopy1Field
  149.     OnRecord = RtDbCopy1Copy
  150.     Left = 104
  151.     Top = 200
  152.   end
  153. end
  154.